home *** CD-ROM | disk | FTP | other *** search
/ The 640 MEG Shareware Studio 4 / The 640 Meg Shareware Studio CD-ROM Volume IV (Data Express)(1994).ISO / clang / cenvid.zip / BATLOOPS.BAT < prev    next >
DOS Batch File  |  1993-03-19  |  2KB  |  90 lines

  1. @echo off
  2. REM CEnviX1.bat
  3. ECHO BatLoops: Use CEnvi and various methods to loop five times
  4.  
  5.  
  6. ECHO  
  7. ECHO LOOP METHOD 1
  8. ECHO    THIS METHOD DEMONSTRATES THE CENVI CAPABILITY FOR MATHEMATICAL
  9. ECHO    PROCESSING OF VARIABLES, EVEN ENVIRONMENT VARIABLES
  10. PAUSE
  11. set LOOP_COUNT=1
  12. :ABEGIN_LOOP
  13.    echo    This is pass %LOOP_COUNT% through this loop - 1
  14.    cenvi LOOP_COUNT++
  15.    if %LOOP_COUNT% == 6 GOTO AEND_LOOP
  16.    GOTO ABEGIN_LOOP
  17. :AEND_LOOP
  18.  
  19.  
  20. ECHO  
  21. ECHO LOOP METHOD 2
  22. ECHO    CENVI WILL SET AN ENVIRONMENT VARIABLE FOR THE PROPER GOTO LABEL
  23. PAUSE
  24. set LOOP_COUNT=1
  25. :BBEGIN_LOOP
  26.    echo    This is pass %LOOP_COUNT% through this loop - 2
  27.    cenvi "LOOP_GOTO = ( LOOP_COUNT++ < 5 ) ? "BBEGIN_LOOP" : "BEND_LOOP""
  28.    GOTO %LOOP_GOTO%
  29. :BEND_LOOP
  30.  
  31.  
  32. ECHO  
  33. ECHO LOOP METHOD 3
  34. ECHO    CENVI SETS AN ENVIRONMENT VARIABLE TO A BATCH FILE STATEMENT
  35. PAUSE
  36. set LOOP_COUNT=1
  37. :CBEGIN_LOOP
  38.    echo    This is pass %LOOP_COUNT% through this loop - 3
  39.    cenvi "LOOP_COMMAND = ( LOOP_COUNT++ < 5 ) ? "GOTO CBEGIN_LOOP" : " ""
  40.    %LOOP_COMMAND%
  41.  
  42. ECHO  
  43. ECHO LOOP METHOD 4
  44. ECHO    CENVI WILL EXECUTE CODE FROM SELECTED LINES OF THIS BATCH FILE
  45. PAUSE
  46. cenvi #include "%0,bat,:CODE4"
  47. :CODE4   for ( i = 1; i <= 5; i++ )
  48. :CODE4      printf("   This is pass %d through this loop - 4\n",i)
  49.  
  50.  
  51. ECHO  
  52. ECHO LOOP METHOD 5
  53. ECHO    CENVI WILL READ SOURCE FROM THIS EXECUTABLE, AND THEN CALL A FUNCTION
  54. PAUSE
  55. cenvi #include "%0,bat,:CODE5"   LoopFoo(1,5)
  56. :CODE5   LoopFoo(min,max) {
  57. :CODE5      for ( i = min; i <= max; i++ )
  58. :CODE5         printf("   This is pass %d through this loop - 5\n",i)
  59. :CODE5   }
  60.  
  61.  
  62. ECHO  
  63. ECHO LOOP METHOD 6
  64. ECHO    THIS METHOD DEMONSTRATES THE USE OF A CMM "EXECUTABLE"; THAT IS, THE
  65. ECHO    .BAT EXTENSION ON THE INPUT TELLS CENVI TO CALL main(argc,argv) WITH
  66. ECHO    THE COMMAND LINE ARGUMENTS
  67. PAUSE
  68. cenvi %0.bat 1 5
  69. GOTO CENVI_EXIT
  70. main(argc,argv)
  71. {
  72.    for ( i = atoi(argv[1]); i <= atoi(argv[2]); i++ )
  73.       printf("   This is pass %d through this loop - 6\n",i)
  74. }
  75. :CENVI_EXIT
  76.  
  77.  
  78. ECHO  
  79. ECHO LOOP METHOD 7
  80. ECHO    CMM SOURCE CODE IS PASSED TO CENVI DIRECTLY ON THE COMMAND LINE
  81. PAUSE
  82. cenvi "for ( i = 1; i <= 5; i++ ) printf("   This is pass %%d through this loop - 7\n",i)"
  83.  
  84.  
  85. REM Cleanup up the variables used
  86. set LOOP_COUNT=
  87. set LOOP_GOTO=
  88. set LOOP_COMMAND=
  89. set METHOD_COUNT=
  90.